home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_06_1985_Transactor_Publishing.d64 / cursor position (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  812b  |  56 lines
  1. 0 rem cursor position (sept 4/84)     :
  2. 1 :
  3. 2 rem  1 statement,  1 function
  4. 3 :
  5. 4 rem keyword characters: 10
  6. 5 :
  7. 6 rem keyword     routine  line   ser #
  8. 7 rem s/cursor    csr      2574    004
  9. 8 rem f/cloc      csrloc   2606    005
  10. 9 :
  11. 10 rem u/usfp (2620/006)
  12. 11 :
  13. 12 rem ================================
  14. 13 :
  15. 101 .asc "curso[210]"
  16. 600 .asc "clo[195]"
  17. 1101 .word csr-1
  18. 1600 .word csrloc-1
  19. 2574 csr jsr $b79e
  20. 2576 cpx #$19
  21. 2578 bcs cs2
  22. 2580 txa
  23. 2582 pha
  24. 2583 ldy #0
  25. 2584 jsr $79
  26. 2585 beq cs1
  27. 2586 cmp #","
  28. 2587 bne cs3
  29. 2588 jsr $b79b
  30. 2589 cpx #$28
  31. 2590 bcs cs2
  32. 2592 txa
  33. 2594 tay
  34. 2596 cs1 pla
  35. 2598 tax
  36. 2599 clc
  37. 2600 jmp $fff0
  38. 2602 cs2 jmp $b248
  39. 2603 cs3 jmp $af08
  40. 2604 ;
  41. 2606 csrloc lda $d1
  42. 2608 clc
  43. 2610 adc $d3
  44. 2612 tay
  45. 2614 lda $d2
  46. 2616 adc #0
  47. 2618 ;
  48. 2620 usfp ldx #0
  49. 2622 stx $0d
  50. 2624 sta $62
  51. 2626 sty $63
  52. 2628 ldx #$90
  53. 2630 sec
  54. 2632 jmp $bc49
  55. 2634 ;
  56.